Returns a ChBorder object that represents the border of each button in the specified drop zone. Use the properties of the returned ChBorder object to format the border of each button in the drop zone.
expression.ButtonBorder
expression Required. An expression that returns a ChDropZone object.
This example formats the button and the watermark of the series drop zone in Chartspace1.
Sub SetupDropZone()
Dim dzSeriesDropZone
Dim ChConstants
Set chConstants = Chartspace1.Constants
' Set a variable to the series drop zone in Chartspace1.
Set dzSeriesDropZone = ChartSpace1.DropZones(chConstants.chDropZoneSeries)
' The next three lines of code format the button of the drop zone.
dzSeriesDropZone.ButtonBorder.Weight = chConstants.owcLineWeightMedium
dzSeriesDropZone.ButtonInterior.SetSolid "Red"
dzSeriesDropZone.ButtonFont.Size = 14
' The next three lines of code format the watermark of the drop zone.
dzSeriesDropZone.WatermarkBorder.Color = "Red"
dzSeriesDropZone.WatermarkFont.Color = "Red"
dzSeriesDropZone.WatermarkInterior.SetSolid "Green"
End Sub